home *** CD-ROM | disk | FTP | other *** search
/ The Macintosh Demo Applications CD / Apple-MacintoshDemoApplicationsCD-1.0-1992.iso / More Information / Persuasion / Interactive / Interactive.rsrc / TEXT_1185.txt < prev    next >
Encoding:
Text File  |  1988-11-03  |  247 b   |  13 lines
  1. Ô#
  2. set &P = 0
  3. if  MOUSEH > 141 then skip 8
  4. if MOUSEH < 110 then skip 7
  5. if not MOUSEV < 244 then skip 6
  6. if not MOUSEV > 232 then skip 5
  7. goto 511
  8. puppet sprite 13 true
  9. cursor 15 1
  10. exit
  11. goto 504
  12. when mousedown then
  13. when mousedown then call c48AÀáV